home *** CD-ROM | disk | FTP | other *** search
/ Chip 2006 June (Extra) / CHIP 2006-06.3.iso / program / tam_surum / Astronoid-v1.2.0.exe / $OUTDIR / data / scripts / environment / pu_common.tcl < prev    next >
Encoding:
Text File  |  2006-03-01  |  359 b   |  24 lines

  1. proc powerup { bitmap } {
  2.  
  3. source "data/scripts/shaders/shaderlib.tcl"
  4.  
  5. new n3dnode quad
  6. sel quad
  7.   
  8.  
  9.   new nmeshnode mesh
  10.   sel mesh
  11.     .setfilename "data/meshes/environment/quad.n3d"
  12.   sel ..
  13.  
  14.   # shader
  15.   sh_nolight_2sided
  16.  
  17.   new ntexarraynode tex
  18.   sel tex
  19.     .settexture 0 "data/maps/environment/$bitmap" none
  20.   sel ..
  21. sel ..
  22.  
  23. }
  24.